ＣＡＰ−Ｘインタープリタ ――――――――――――――――――――――――――――――――――――――― Ｉ／Ｏ　１９８０年　５月号掲載 ＭＺ−８０Ｋ マシン語　０２０００Ｈ−０２Ａ０３Ｈ スタート　　　　　０２０００Ｈ ウォームスタート　０２０６０Ｈ 起動方法 モニタからＬＯＡＤ ――――――――――――――――――――――――――――――――――――――― このところ『明石ミニコン研究会』によるＣＡＰ−Ｘの連載が続いていますが、 ＭＺ−８０で動くＣＡＰ−Ｘアセンブラを作ってみましたので紹介します。 プログラムは、『テキスト・エディタ』、『ＣＡＰ−Ｘアセンブラ』 『ＣＯＭＰ−Ｘシミュレータ』の３ユニットから成ります。 このシステムはクロスアセンブラと違い、 ＣＡＰ−Ｘが、実際にＣＯＭＰ−Ｘのオブジェクトを生成し、 シミュレータがそれを解釈実行するというインタープリタ形式なので、 実行速度はやや遅くなりますが、ＣＯＭＰ−Ｘの動作が理解しやすく、 直接メモリに書いた機械語プログラムを実行させることができるなどの 利点があります。 ＭＺ−８０をお持ちの方は、ぜひ、ご利用ください。 ・――――――――――――――――――・ ｜　　　　　システムの概要　　　　　　｜ ・――――――――――――――――――・ システムの流れは、図１のようになります。 まず、エディタでソース・テキストを作成します。 使用できるコマンドは表１にまとめてありますが、 詳細は各項で説明します。 図１　プログラムの流れ 　　　　　　　　　　　・――――・ 　　　　　　　　　　　｜ＴＡＰＥ｜ 　　　　　　　　　　　・――――・ 　・―――――――・　　　↑ 　｜ＯＳ｜エディタ｜―――｜　テープ・ファイル 　・−−−−−−−・　　　↓ 　　｜｜　　編集↑　・――――――――・ 　　｜｜　　　　・→｜ソース・テキスト｜ 　　｜｜　　　　　　・――――――――・ 　　｜｜　・―――――・　｜ 　　｜・→｜ＣＡＰ−Ｘ｜―｜↓ 　　｜　　｜アセンブラ｜　｜ 　　｜　　・―――――・　↓ 　　｜　　　　　　　・――――――・ 　　｜　　　　　　　｜ＣＯＭＰ−Ｘ｜ 　　｜　　　　　　　｜オブジェクト｜ 　　｜　　　　　　　・――――――・ 　　｜　・――――――・　｜ 　　・→｜ＣＯＭＰ−Ｘ｜−｜↓ 　　　　｜シミュレータ｜　｜ 　　　　・――――――・　｜ 　　　　　　　　　　　　　↓ 　　　　　　　　　　　・―――・ 　　　　　　　　　　　｜実　行｜ 　　　　　　　　　　　・―――・ 表１　ＣＯＭ−Ｘシステム・コマンド 　・―――――――――――――――――――――――――――――・ 　｜Ｉｓ｜Ｉｎｓｅｒｔ　｜　Ｐの指す行の上にｓを挿入　　　　　｜ 　｜Ｉ　｜　　　　　　　｜　入力モード（連続してｓを挿入）　　｜ 　｜Ｔｄ｜Ｔｙｐｅ　　　｜　Ｐの位置からｄ行を出力　　　　　　｜ 　｜Ｔ　｜　　　　　　　｜　バッファの内容を令部出力　　　　　｜ 　｜Ｋｄ｜Ｋｉｌｌ　　　｜　Ｐの位置からｄ行を抹消　　　　　　｜ 　｜Ｃｓ｜Ｃｏｒｒｅｃｔ｜　Ｐの指す行の内容をｓに変更　　　　｜ 　｜Ｓ　｜Ｓｅａｒｃｈ　｜　Ｐの位置から下ヘｓを検索　　　　　｜ 　｜Ｂ　｜Ｂｅｇｉｎ　　｜　Ｐをバッファの先頭へ移動　　　　　｜ 　｜Ｚ　｜Ｚｅｅ　　　　｜　Ｐをバッファの最後へ移動　　　　　｜ 　｜Ｕｄ｜Ｕｐ　　　　　｜　Ｐをｄ行上昇　　　　　　　　　　　｜ 　｜Ｄｄ｜Ｄｏｗｎ　　　｜　Ｐをｄ行下降　　　　　　　　　　　｜ 　｜Ｗ　｜Ｗｒｉｔｅ　　｜　バッファの内容をＭＴに出力　　　　｜ 　｜Ｒ　｜Ｒｅａｄ　　　｜　Ｐの指す行の上にＭＴから付加入力　｜ 　｜――＋―――――――＋――――――――――――――――――｜ 　｜＃　｜Ｐｒｉｎｔｅｒ｜　プリンタのリスト・モードを反転　　｜ 　｜＆　｜Ｒｅｓｔａｒｔ｜　バッファをクリア・＃をｏｆｆ　　　｜ 　｜！　｜Ｍｏｎｉｔｏｒ｜　ＭＺ−８０モニタへジャンプ　　　　｜ 　｜――＋―――――――＋――――――――――――――――――｜ 　｜Ａ１｜Ｐａｓｓ　１　｜　アセンブラにラベル名を登録　　　　｜ 　｜Ａ２｜Ｐａｓｓ　２　｜　アセンブルを実行して出力　　　　　｜ 　｜Ａ３｜Ｐａｓｓ　３　｜　オブジェクトをメモリに格納　　　　｜ 　｜――＋―――――――＋――――――――――――――――――｜ 　｜／　｜Ｒｕｎ　　　　｜　プログラムを指定した番地から実行　｜ 　｜／ｎ｜　　　　　　　｜　プログラムをｎ番地から実行　　　　｜ 　｜＊　｜Ｃｌｅａｒ　　｜　ＧＲ０〜３、ＣＣをクリア　　　　　｜ 　｜Ｓ０｜Ｄｉｓａｂｌｅ｜　シミュレータのコールを禁止　　　　｜ 　｜Ｓ１｜Ｅｎａｂｌｅ　｜　シミュレータのコールを許可　　　　｜ 　・―――――――――――――――――――――――――――――・ 　　ｓ：文字列　ｄ，ｎ：10進数 図２に示すように、ソースはメモリの3000番地以降に格納されます。 ソース・エリアの終端はＯＢＪＳＴで、 オブジェクトの格納される領域との境界です。 このプログラムではＯＢＪＳＴ＝5000番地ですが、 メモリのサイズに応じて変えられるようになっています。 ソースはカセットＭＴに記録保存できます。 また、ＭＴからの入力のときは、 Ｉコマンドと同様に付加入力の形式をとっているので、 複数のプログラムを後から結合することができます。 さて、ソースの入力が終わったら、アセンブルを行ないます。 この過程でエラーが見付かった場合は、 エディタに戻ってソースを修正します。 エラーがなければ、 オブジェクトを前述のＯＢＪＳＴ以降にロードして、 シミュレータに制御を渡せば命令が実行されます。 システム・プログラムのサイズは約２．５Ｋバイトで、 ワーク・エリアとソース、オブジェクトのバッファを合わせても、 ＭＺ−８０Ｋの標準システム（ＲＡＭ20Ｋバイト実装）で充分走ります。 本システムでのプログラム例として、 フィボナッチ数列のリストと実行結果を実行例１に示します。 図２　アドレス・マップ 　　　　　　　　　　・――――――――――――・ （Cold　Start） 2000｜　　　　　　　　　　　　｜ （Warm　Start） 2060｜――――――――――――｜ 　　　　　　　　　　｜　テキスト・エディタ　　｜ 　　　　　　　　　　｜　　　（含むＯＳ）　　　｜ 　　　　　　　　22FA｜――――――――――――｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜　ＣＡＰ−Ｘアセンブラ　｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　26F4｜――――――――――――｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜ＣＯＭＰ−Ｘシミュレータ｜ 　　　　　　　　2997｜――――――――――――｜ 　　　　　　　　　　｜　　ワーク・エリア　　　｜ 　　　　　　　　2A01｜――――――――――――｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜　　ラベル・テーブル　　｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　3000｜――――――――――――｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜ソース・テキスト・エリア｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 　　　　　　　　　　｜――――――――――――｜ 　　　　　OBJST=5000｜――――――――――――｜0 　　　　（可変）：　｜　　　　　　　　　　　　｜1 　　　　　　　　：　｜　　　　　　　　　　　　｜: 　　　　　OBJST+2*N ｜←――――――――――→｜N 　　　　　　　　　　｜Z80の 　　　 　 COMP-Xの｜ 　　　　　　　　　　｜アドレス　　　　アドレス｜ 　　　　　　　　　　｜　　　　　　　　　　　　｜ 実行例１　プログラム例 　ａ）ソース・リスト　　　　　　　〜フィボナッチ数例〜 　　; 　　; FIBONACCI SERIES　　　　　　　　　　　　ｃ）実行結果 　　; 1 　　P1:START 0 2 　　LOP:LD 1,FB1 3 　　LD 2,FB1 5 　　ADD 1,FB2 8 　　ST 1,FB1 13 　　ST 2,FB2 21 　　WRITE 1,10 34 　　JC 2,LOP 55 　　HJ 0,P1 89 　　FB1:CONST 0001 144 　　FB2:CONST 0000 233 　　END P1 337 　　 610 　ｂ）アセンブル・リスト 987 　　0000 ; 1597 　　0000 ; FIBONACCI SERIES 2584 　　0000 ; 4181 　　0000 FP1: START 0 6765 　　0000 C408 LOP: LD 1,FB1 10946 　　0001 C808 LD 2,FB1 17711 　　0002 A409 ADD 1,FB2 28657 　　0003 D408 ST 1,FB1 46368 　　0004 D809 ST 1,FB2 　　0005 740A WRITE 1,10 　　0006 2800 HJ 0,P1 　　0008 0001 FB1: CONST 0001 　　0009 0000 FB2: CONST 0000 　　0010 END P1 ・―――――――――――――――――・ ｜　　　　テキスト・エディタ　　　　｜ ・―――――――――――――――――・ ここはシステム・プログラムのエントリであり、 簡易なＯＳ機能を持ちます。 アセンブラやシミュレータヘの命令も、 すべてエディタ・モードで行ないます。 コマンドはすべてサブルーチンになっていて、 実行のときは、あらかじめ帰り番地をプッシュしておき、 テーブルをサーチして分岐先を求め、ジャンプします。 スタックの深さがわかりにくい場所からは、 強引にジャンプで戻ってきます。 エディタ・モードでは、 常時、“＞”記号（プロンプト）が出力されます。 次に、エディタ用コマンドの詳細を説明します。 ●エディタ用コマンド ・―――――――――――――――――・ ｜Ｉ（Ｉｎｓｅｒｔ）　コマンド　　　｜ ・―――――――――――――――――・ たとえば、[Ｉ][Ａ][Ｂ][Ｃ][CR]と打つと、 Ｐ（ポインタ）の指す行の上に “ＡＢＣ”の１行が入力されます。 連続して入力したい場合は、 １度[Ｉ][CR]と打ちます。 この状態を入力モードと呼び、プロンプトは出力されません。 そこでｓ１[CR]ｓ２[CR]…（ｓは文字列）と入力していきます。 単に[CR]を打てば、エディタ・モードに戻ります。 ・―――――――――――――――――・ ｜Ｔ（Ｔｙｐｅ）　コマンド　　　　　｜ ・―――――――――――――――――・ [Ｔ][１][０][CR]と打つと、 Ｐの指す行を含めて10行が出力されます。 一般に[Ｔ]ｄ[CR]（１≦ｄ≦ 255）の形を取ります。 実行後、Ｐの位置は変化しません。 [Ｔ][CR]と打つと、 Ｐの位置に関係なくバッファの内容が全部出力されます。 出力は[ＢＲＥＡＫ]キーにより中断できます。 ・―――――――――――――――――・ ｜Ｋ（Ｋｉｌｌ）　コマンド　　　　　｜ ・―――――――――――――――――・ 行の抹消に用います。 [Ｋ]ｄ[CR]と打てば、Ｐ以下ｄ行力削除されます。 ・―――――――――――――――――・ ｜Ｃ（Ｃｏｒｒｅｃｔ）　コマンド　　｜ ・―――――――――――――――――・ １行修正するのに用います。 [Ｃ][Ａ][Ｂ][Ｃ][CR]と打つと、 現在指している行の内容が“ＡＢＣ”に変わります。 一般に[Ｃ]ｓ[CR]（ｓ：文字列）の形をとります。 ・―――――――――――――――――・ ｜Ｓ（Ｓｅａｒｃｈ）　コマンド　　　｜ ・―――――――――――――――――・ 文字列の検索に用います。 [Ｓ]ｓ[CR]と打つと、 Ｐの位置から下へ向かってｓを探し、 最初に発見した行の先頭にＰをセットしてその行を出力します。 もし、存在しない場合はＰは移動しません。 ・―――――――――――――――――・ ｜Ｂ（Ｂｅｇｉｎ）　コマンド　　　　｜ ・―――――――――――――――――・ Ｐをバッファの先頭に持っていきます。 すなわち、実行後Ｐはテキストの最初の行を指すことになります。 ・―――――――――――――――――・ ｜Ｚ（Ｚｅｅ）　コマンド　　　　　　｜ ・―――――――――――――――――・ Ｐをバッファの最後に持っていきます （Ｚはアルファベットの最後の文字なので）。 実行後、Ｐはテキストの最後の行の次 （メモリにはゼロが書き込まれている）を指します。 ・―――――――――――――――――・ ｜Ｕ（Ｕｐ）　コマンド　　　　　　　｜ ・―――――――――――――――――・ Ｐをｄ行上げるのに用います。 [Ｕ]ｄ[CR]と打ちます。 もし、バッファの先頭に達してしまったら、そこで止まります。 この場合Ｂコマンド実行後と同じになります。 ・―――――――――――――――――・ ｜Ｄ（Ｄｏｗｎ）　コマンド　　　　　｜ ・―――――――――――――――――・ Ｐをｄ行下げるのに使います。 用法はＵコマンドと同様。 ・―――――――――――――――――・ ｜＆（Ｒｅｓｔａｒｔ）　コマンド　　｜ ・―――――――――――――――――・ バッファ内をクリアして、プリンタ・モードをＯｆｆにします。 プログラムを最初から打ち直すのに使います。 ●周辺制御用コマンド ・―――――――――――――――――・ ｜Ｗ（Ｗｒｉｔｅ）　コマンド　　　　｜ ・―――――――――――――――――・ カセットテープ・ファイルにバッファの内容を出力します。 このとき、[ＦＩＬＥＮＡＭＥ？]と聞いてくるので、 適当な名前を付けることができます。 ・―――――――――――――――――・ ｜Ｒ（Ｒｅａｄ）　コマンド　　　　　｜ ・―――――――――――――――――・ カセットテープ・ファイルから、ソース・テキストを入力します。 バッファ内にソース・テキストが存在するときは、 Ｐの指す行の上にＩコマンドと同様に付加入力されます。 ・―――――――――――――――――・ ｜＃（Ｐｒｉｎｔｅｒ）　コマンド　　｜ ・―――――――――――――――――・ プリンタヘの出力をｏｎ−ｏｆｆします。 初期状態はｏｆｆがであり、１回入力するごとに反転します。 ｏｎの状態では、プリンタ、ＣＲＴの両方に出力されます。 ただし、アセンブル・リストをとるときに、 ＣＲＴの方は40文字を越える分か無視されます。 もし、＃がｏｎで、 プリンタが接続されていないときに出力をしようとすると、 システムは数秒間待った後、 自動的に＃をｏｆｆにして出力を再開します。 ・―――――――――――――――――・ ｜！（Ｍｏｎｉｔｏｒ）　コマンド　　｜ ・―――――――――――――――――・ ＭＺ−８０のモニタヘジヤンプします。 復帰するときは、 GOTO$2060 （Ｗａｒｍ　Ｓｔａｒｔ）とすれば、 バッファをクリアせずにエディタヘ戻ります。 ・―――――――――――――――――・ ｜　　　ＣＡＰ−Ｘアセンブラ　　　　｜ ・―――――――――――――――――・ このＣＡＰ−Ｘは什様書にできるだけ近く作られていますが、 若干の注意点があるので述べます。 ■行 　行の終わりはＣＲ（0DＨ）で示されます。 　１行は80字以内であり、空白だけからなる行は誤りです。 　別のセットのエディタを使用するときは注意してください。 ■ラベル 　すべての命令にラペルを付けることができます。 　ラペルの直後には“：”（コロン）を書かなければなりません。 　ラベルは最初の３文字が有効です。 ■命令 　ＣＡＰ−Ｘは表２のように、拡張された１６種の命令 　と５種の擬似命令とから成ります。命令も最初の３文字 　で識別しているので、省略形が可能となります。 　ニモニックとオペランドの間には１つ以上の空白を入れます。 ■注釈 　“；”（セミコロン）以降が全部注釈と見なされます。 　行の始めに置くと行全体が注釈になります。 　途中に置いた“；”は出力のときに41桁目にタブされるので、 　命令の後に書いた注釈をＣＲＴで見ることはできません。 ■エラーメッセージ 　エラーメッセージはＰａｓｓ２のときに 　行の左端に英文字１字で出力されます（実行例２）。 　これには７通りあり、表３のような意味を持ちます。 　アセンブラに制御を渡すには、先頭にＡを打ちます。 　次に来る数字（１〜３）によって、各段階の動作を行ないます。 　表２　ＣＯＭＰ−Ｘ命令語表（○印は新設命令） 　　　ＣＡＰ−Ｘ用命令 　･---------------------------------------------------------------･ 　| 0 |HJ |SC←EA　注1) Halt until CR(復改) 注1)EA：実効ｱﾄﾞﾚｽ | 　| 1 |JNZ |if(GR)≠0 then SC←ＥＡ else SC←SC+1 | 　| 2 |JC | ･- 0 SC←SC+1 | 　| | | | 1 if cc then SC←EA else SC←SC+1 | 　|　 | |GR=| 2 if cc then SC←SC+1 else SC←EA | 　| | | ･- 3 SC←EA | 　| 3 |JSR |(GR)←SC+1,SC←(EA),BR←(EA),上位８ビット | 　| 4 |SFT | ･- ･--------------･ | 　| | | | 0|::|―→GR―→ | | | | | | ･→･--------------･ | | | |XR=| |___/ | | | | | ･--------------･ | 　| | | | 1|::|―→GR―→ |←0 | | | | ･- ･--------------･ | 　|(5)|USR |GR=|0 全レジスタの値を表示、かつ変更可能 | 　| | | |1 コール可能の時 Z80の絶対番地に対してCALL (EA) | 　|(6)|READ |(GR)に打鍵により数値を入力、AD=10(10進数),16(16進数) | 　|(7)|WRITE|(GR)をAD進数で出力、 2≦AD≦16 | 　| | |AD=0のとき、改行のみ | 　| 8 |LAI |(GR)←EA下位８ビット | 　|(9)|OR |(GR)←(GR)∨(EA) | 　| A |ADD |(GR)←(GR)＋(EA)、CC←SIGN | 　| B |SUB |(GR)←(GR)−(GR)−(EA)、CC←SIGN | 　| C |LD |(GR)←(EA) | 　| D |ST　 |(EA)←(GR) | 　| E |AND |(GR)←(GR)∧(EA) | 　| F |EOR |(GR)←(GR)∀(EA) | 　･---------------------------------------------------------------･ ＣＡＰ−Ｘ用擬似命令（○印は新設命令） 　･---------------------------------------------------------------･ 　| |START| d |以降のプログラムをｄ番地から格納 | 　| |END |(d)|ｄ番地から実行開始（サブルーチンにはｄは不要） | 　| |CONST| h |１６進定数１語 | 　| |RESV | d |ｄ語の領域を確保 | 　| |ADCON| d |アドレス定数１語 | 　|Ｏ |EQU | d |ラベルの値を定義 | 　･---------------------------------------------------------------･ 　　ｄ：１０進数またはラペル　ｈ：１６進数４桁 実行例２　エラーメッセージの出力例 　 0000 ; 　 0000 ; ERROR MESSAGE SAMPLE 　 0000 ; 　 0000 PPP: START 0 　Q 0000 2000 XOR 1,2,1 　M 0001 C40E DBL: LD 1,ABC 　 0002 6C10 READ 3,16 　C 0003 2000 SUB 4,KKK 　 0004 7C0D WRITE 3,13 　M 0005 DD1D DBL: ST 3,KKK,1 　 0006 A500 ADD 1,0,1 　 0007 A500 ADD 1,,1 　C 0008 2000 ADD 1,1, 　U 0009 2800 JC 2,NOW 　 0010 ; F 0010 2000 SFT 1,1,1 　 0011 9F1C CR 3,GG,3 　N 0012 2000 AND 1,3S 　 0013 0000 HJ 0,PPP 　 0014 ABC: RESV 14 　N 0028 2000 GG: CONST 1 　 0029 FFFF KKK: CONST FFFF 　 0030 END PPP 　* ASSEMBLE END 001E 表３　ＣＡＰ−Ｘアセンブラのエラーメッセージ 　・―――――――――――――・ 　｜　Ｕ　｜ラベルの未定義　　｜ 　｜　Ｍ　｜ラベルの多重定義　｜ 　｜　Ｑ　｜ニモニックの誤り　｜ 　｜　Ｃ　｜オペランドの誤り　｜ 　｜　Ｎ　｜数値表現の誤り　　｜ 　｜　Ｆ　｜フォーマットの誤り｜ 　｜　Ｒ　｜ソースの形式の誤り｜ 　・―――――――――――――・ ●アセンブラ用コマンド ・―――――――――――――――――・ ｜Ａ１（Ｐａｓｓ１） ｜ ・―――――――――――――――――・ ラベルを検索してラベル・テーブルに登録します。 このとき、ラベル多重定義のチェックが行なわれます。 ・―――――――――――――――――・ ｜Ａ２（Ｐａｓｓ２） ｜ ・―――――――――――――――――・ アセンブルを実行して、 アドレスとオブジェクト・コードを出力します。 また、エラーメッセージも出力されます。 中断したいときは、[ＢＲＥＡＫ]キーを押してください。 ・―――――――――――――――――・ ｜Ａ３（Ｐａｓｓ３） ｜ ・―――――――――――――――――・ アセンブルを実行して、 オブジェクト・コードを実効アドレスにロードします。 ここで、図２に示すように、 ＣＯＭＰ−ＸとＺ80のアドレスは互いに異なり、 ＣＯＭＰ−Ｘの０番地がＺ80のＯＢＪＳＴに、 Ｎ番地がＯＢＪＳＴ＋２＊Ｎに対応します。 通常、アセンブルはＡ１→Ａ２→Ａ３の順に行ないます。 Ａ２は省略しても構いませんが、 Ａ１はラベルがあるときは必ず実行してください。 ・―――――――――――――――――・ ｜ＣＯＭ−Ｘ　シミュレータ　　　　　｜ ・―――――――――――――――――・ ＣＯＭＰ−Ｘシミュレータは、 メモリ上のＣＯＭＰ−Ｘ命令を逐次解釈して実行するユニットです。 ＣＯＭＰ−Ｘ命令は、 ＣＡＰ−Ｘアセンブラが生成したものも、 マシン語モニタなどで書き込んだものも同様に扱われます。 動作中はBCレジスタがSC（制御カウンタ）の役目をします。 また、主にHLレジスタが他の16ビットのパラメータの受け渡しをしています。 ＣＯＭＰ−Ｘの動作については、 命令解析部のＮＳチャートを図３に掲げましたので参照してください。 図３　ＣＯＭＰ−Ｘ命令解析部ＮＳチャート　〔　〕内は命令コード 　〔０〕ＨＪ　　　　　　　　　〔５〕ＵＳＲ 　・―――――――――・　　　・――――――――――――・ 　｜　　ＪＥＦＦ　　　｜　　　｜＼　ＧＲフィールド　　／｜ 　｜−・−−−−−−−｜　　　｜０＼　　　　　　　　／１｜ 　｜　｜　ＧＥＴＫＹ　｜　　　｜――――――――――――｜ 　｜　｜−−−−−−−｜　　　｜ ﾚｼﾞｽﾀの｜＼ ｺｰﾙ可能／　｜ 　｜　｜復改ならＲＥＴ｜　　　｜値を表示｜no＼　　／yes ｜ 　｜　｜ＢＲＥＡＫなら｜　　　｜――――――――――――｜ 　｜　｜エディタへ　　｜　　　｜ ﾚｼﾞｽﾀの｜　　｜ LODEF　｜ 　｜　・−−−−−−−｜　　　｜値を修正｜　　｜　　　　｜ 　｜　ＵＮＴＩＬ　０　｜　　　｜――――――――――――｜ 　・―――――――――・　　　｜　　　　　　　｜ JP(HL) ｜ 　　　　　　　　　　　　　　　・――――――――――――・ 　〔１〕ＪＮＺ　　　　　　　　〔６〕ＲＥＡＤ 　・―――――――――・　　　・―――――――――・ 　｜　　ＬＯＤＧＲ　　｜　　　｜＼ＡＤフィールド／｜ 　｜―――――――――｜　　　｜10＼　　　　　／16｜ 　｜＼　　ＧＲ＝０　／｜　　　｜―――――――――｜ 　｜　＼　　　　　／　｜　　　｜10進　　｜16進　　｜ 　｜yes ＼　　　／ no ｜　　　｜任意桁　｜４桁入力｜ 　｜―――――――――｜　　　｜入力　　｜　　　　｜ 　｜　　　｜ＪＥＦＦ　｜　　　｜―――――――――｜ 　・―――――――――・　　　｜　　ＳＴＯＧＲ　　｜ 　　　　　　　　　　　　　　　・―――――――――・ 　〔２〕ＪＣ　　　　　　　　　〔７〕ＷＲＩＴＥ 　・――――――――――・　　・―――――――――・ 　｜＼　　 (GR,CC)　　／｜　　｜　　ＬＯＤＧＲ　　｜ 　｜　＼　　　　　　／　｜　　｜―――――――――｜ 　｜　　＼　　　　／　　｜　　｜ＡＤフィールドの　｜ 　｜(0,X) ＼　　／ (3,X)｜　　｜記法で出力　　　　｜ 　｜(1,0) 　＼／　 (1,1)｜　　・―――――――――・ 　｜(2,1) 　｜　　 (2,0)｜ 　｜――――＋―――――｜ 　｜　　　　｜ＪＥＦＦ　｜ 　・――――――――――・ 　〔３〕ＪＳＲ　　　　　　　　〔８〕ＬＡＩ 　・―――――――――・　　　・―――――――――・ 　｜　　ＬＯＤＥＦ　　｜　　　｜　　ＬＯＤＸＲ　　｜ 　｜―――――――――｜　　　｜―――――――――｜ 　｜　ＨＬ←→ＢＣ　　｜　　　｜　Ｈ←Ｏ　　　　　｜ 　｜　ＢＲ上位←Ｂ　　｜　　　｜　Ｈ←Ｌ＋ＡＤ　　｜ 　｜―――――――――｜　　　｜―――――――――｜ 　｜　　ＳＴＯＧＲ　　｜　　　｜　　ＳＴＯＧＲ　　｜ 　・―――――――――・　　　・―――――――――・ 　〔４〕ＳＦＴ　　　　　　　　〔９〕ＯＲ 　・―――――――――・　　　・――――――――――・ 　｜　　ＬＯＤＧＲ　　｜　　　｜　　　ＬＯＤＥＦ　　｜ 　｜−−−−−−−−−｜　　　｜――――――――――｜ 　｜　ＷＨＩＬＥ回数　｜　　　｜　ＨＬ←ＨＬ∨ＤＥ　｜ 　｜　・―――――――｜　　　｜――――――――――｜ 　｜　｜ＸＲフィールド｜　　　｜　　ＳＴＯＧＲ　　　｜ 　｜　｜に応じてシフト｜　　　・――――――――――・ 　｜―――――――――｜ 　｜　　ＳＴＯＧＲ　　｜ 　・―――――――――・ 　----------------------------------------------------------------------- 　〔Ａ〕ＡＤＤ　　　　　　　　〔Ｅ〕ＡＮＤ 　・――――――――――・　　・――――――――――・ 　｜　　ＬＯＤＥＧ　　　｜　　｜　　ＬＯＤＥＧ　　　｜ 　｜――――――――――｜　　｜――――――――――｜ 　｜　ＨＬ←ＨＬ＋ＤＥ　｜　　｜　ＨＬ←ＨＬ＆ＤＥ　｜ 　｜――――――――――｜　　｜――――――――――｜ 　｜　ＣＣ←ＳＩＧＮ　　｜　　｜　　ＳＴＯＧＲ　　　｜ 　｜――――――――――｜　　・――――――――――・ 　｜　　ＳＴＯＧＲ　　　｜ 　・――――――――――・ 　〔Ｂ〕ＳＵＢ　　　　　　　　〔Ｆ〕ＥＯＲ 　・――――――――――・　　・―――――――――――・ 　｜　　ＬＯＤＥＧ　　　｜　　｜　　　ＬＯＤＥＧ　　　｜ 　｜――――――――――｜　　｜―――――――――――｜ 　｜　ＨＬ←ＨＬ−ＤＥ　｜　　｜　ＨＬ←ＨＬ(+)ＤＥ 　｜ 　｜――――――――――｜　　｜―――――――――――｜ 　｜　ＣＣ←ＳＩＧＮ　　｜　　｜　　　ＳＴＯＧＲ　　　｜ 　｜――――――――――｜　　・―――――――――――・ 　｜　　ＳＴＯＧＲ　　　｜ 　・――――――――――・ 　〔Ｃ〕ＬＤ 　・――――――――・ 　｜　ＬＯＤＥＦ　　｜ 　｜――――――――｜ 　｜　ＳＴＯＧＲ　　｜ 　・――――――――・ 　〔Ｄ〕ＳＴ 　・――――――――・ 　｜　ＬＯＤＧＲ　　｜ 　｜――――――――｜ 　｜　ＳＴＯＥＦ　　｜ 　・――――――――・ 　----------------------------------------------------------------------- 　　ＬＯＤＥＧ　　　　　　　ＬＯＤＥＦ　　　　　　　　ＳＴＯＥＦ 　・――――――――・　　・―――――――――・　　・―――――――――・ 　｜　ＬＯＤＥＦ　　｜　　｜　　ＳＥＴＥＦ　　｜　　｜　　ＤＥ←ＨＬ　　｜ 　｜――――――――｜　　｜―――――――――｜　　｜―――――――――｜ 　｜　ＤＥ←ＨＬ　　｜　　｜　ＨＬ←（ＨＬ）　｜　　｜　　ＳＥＴＥＦ　　｜ 　｜――――――――｜　　・―――――――――・　　｜−−−−−−−−−｜ 　｜　ＬＯＤＧＲ　　｜　　　　　　　　　　　　　　　｜　（ＨＬ）←ＤＥ　｜ 　・――――――――・　　　　　　　　　　　　　　　・―――――――――・ 　 　　ＪＥＦＦ　　　　　　　　ＳＥＴＥＦ　　　　　　　　ＬＯＤＸＲ 　・――――――――・　　・――――――――・　　　・―――――――――・ 　｜　ＬＯＤＸＲ　　｜　　｜　ＬＯＤＸＲ　　｜　　　｜　ＨＬ←（ＸＲ）　｜ 　｜――――――――｜　　｜――――――――｜　　　・―――――――――・ 　｜　Ｂ←ＢＲ上位　｜　　｜　Ｈ←ＢＲ上位　｜ 　｜　Ｃ←Ｌ＋ＡＤ　｜　　｜　Ｌ←Ｌ＋ＡＤ　｜　　　　ＬＯＤＧＲ 　・――――――――・　　｜――――――――｜　　　・―――――――――・ 　　　　　　　　　　　　　｜絶対ｱﾄﾞﾚｽ に変換｜　　　｜　ＨＬ←（ＧＲ）　｜ 　　　　　　　　　　　　　・――――――――・　　　・―――――――――・ 　　　　　　　　　　　　　　　　　　　（注１） 　　　　　　　　　　　　　　　　　　　　　　　　　　　ＳＴＯＧＲ 　注１）ＣＯＭＰ−Ｘの見かけ上のアドレスから、　　　・―――――――――・ 　　　　Ｚ80の真のアドレスに変換する。　　　　　　　｜　（ＧＲ）←ＨＬ　｜ 　注２）BCレジスタはSCに用いている。　　　　　　　　・―――――――――・ ●シミュレータ用コマンド ・―――――――――――――――――・ ｜／（Ｒｕｎ）　コマンド　　　　　　｜ ・―――――――――――――――――・ [／][CR]と打つと、 プログラムを、メイン・ルーチンのＥＮＤ命令が指定する番地から実行します。 同時に、ＢＲの上位８ビットもこの番地にセットされます。 [／]ｎ[CR]と打つと、プログラムをｎ番地から実行します。 ・―――――――――――――――――・ ｜＊（Ｃｌｅａｒ）　コマンド　　　　｜ ・―――――――――――――――――・ ＧＲ０〜ＧＲ３の内容を０クリアし、ＣＣをリセットします。 ・―――――――――――――――――・ ｜＄（Ｃａｌｌ）　コマンド　　　　　｜ ・―――――――――――――――――・ コール許可フラグをセット・リセットします。 これはＵＳＲ命令のＸＲ＝１のときに参照されるフラグです。 セットするには[＄][１][CR]、 リセットするには[＄][０][CR]と打ちます。 ＣＡＰ−ＸおよびＣＯＭＰ−Ｘで扱える命令は表３の通りです。 ここでは拡張命令について説明します。 これらは、ＣＯＭＰ−Ｘの空きコードを利用して作られた命令で、 いずれも１語の長さを持ちます。 ●ＣＯＭＰ−Ｘ拡張命令 ・―――――――――――――――――・ ｜ＵＳＲ命令　　　　　　　　　　　　｜ ・―――――――――――――――――・ 最も強力な命令です。 ＧＲ＝０のとき、全レジスタの値を表示して停止します。 全レジスタとは、SC（16ビット）、BR（16ビット）、 GR０〜３（各16ビット）、CC（１ビット）のことです。 SCは、ＵＳＲ命令の置かれた次の番地（次に実行する番地）を指しています。 これらの値は、カーソル・エディット機能によって 変更することができます。 動作は[CR]により、再開します。 GR＝１のとき、コール許可フラグがセットされていれば、 実効アドレスが指定する語の内容の番地に対して、 Ｚ80の機械語コールをかけます。 これによってＺ80のプログラムとリンク可能になります。 なお、このとき、 ＩＸレジスタは使用しているので壊さないよう注意してください。 また、BCレジスタはSCであり、 ＣＯＭＰ−Ｘから見た 次の実行すべき番地が格納されており変更可能です。 ＵＳＲ命令を使った例を実行例３に示します。 実行例３　ＵＳＲ命令使用例 　 0000 ; 　 0000 ; FLAG TEST 　 0000 ; 　 1024 PG1: START 1024 　 1024 8000 LAI 0,0 　 1025 8401 LAI 1,1 　 1026 B8FF LAI 2,255 　 1027 BE01 LAI 3,1,2 　 1028 AC09 ADD 3,ONE 　 1029 5000 USR 0,0 　 1030 B009 SUB 0,ONE 　 1031 5000 USR 0,0 　 1032 0000 HJ 0,PG1 　 1033 0001 ONE: CONST 001 　 1034 END PG1 　 　*ASSEMBLE END 040A 　 　 　SC BR GR0 GR1 GR2 GR3 CC 　0406 0400 2000 0001 00FF 0001 0 　 　SC BR GR0 GR1 GR2 GR3 CC 　0408 0400 FFFF 0001 00FF 0001 1 ・―――――――――――――――――・ ｜ＲＥＡＤ命令　　　　　　　　　　　｜ ・―――――――――――――――――・ 指定されたＧＲに、打鍵により数値を入力できます。 数値の記数法は10進および16進のみが許され、 あらかじめＡＤフィールドに宣言しておきます。 16進のときは必ず４桁入力します。 ＣＯＭＰ−Ｘは有効な入力が得られるまで待ちます。 ・―――――――――――――――――・ ｜ＷＲＩＴＥ命令　　　　　　　　　　｜ ・―――――――――――――――――・ 指定されたＧＲの内容をＡＤフィールドに宣言した記数法で出力します。 ただし、２≦ＡＤ≦16です。 また、特別にＡＤ＝０のときは改行だけを行ないます。 【注】ＲＥＡＤ、ＷＲＩＴＥ命令は、 　　　明石ミニコン研究会の仕様に合わせてあります。 ・―――――――――――――――――・ ｜ＯＲ命令　　　　　　　　　　　　　｜ ・―――――――――――――――――・ ＡＮＤやＥＯＲと同じように使用できます。 ・――――――・ ｜　おわりに　｜ ・――――――・ マイクロプロセッサの規模も、技術の進歩と社会の要請に応じて ４ビットから８ビット、そして16ビットヘと拡大の一途をたどっています。 近い将来、パーコンの主流も16ビットになることが予想されますが、 ＣＡＰ−Ｘが、単なる受験のための言語にとどまらず、 来たるべき時代への布石として少しでも役立つことを願っています。 なお、各プログラム・ユニットの開発にあたって、次の文献を参考にしました。 【】参考文献 ●エディタ部 １）工藤裕司：“ＰＡＬＬを解剖する”、 　　Ｉ／Ｏ　’80年１月号、工学社 ２）和田英一：マイクロエディタ、 　　ｂｉｔ増刊　マイクロコンピュータのプログラミング、共立出版 ●アセンブラ部 ３）高澤嘉光：“マイクロコンピュータのアセンブラ”、 　　同上、 ●シミュレータ部 ４）明石ミニコン研究会編：“ＣＡＰ−Ｘ勉強室”、 　　Ｉ／Ｏ連載中。